Top 10 Cuisine(in number) vs. Score in MANHATTAN
rt_clean %>%
filter(boro == "MANHATTAN") %>%
mutate(cuisine_description = fct_reorder(cuisine_description, score)) %>%
plot_ly(y = ~ score, x = ~ cuisine_description, color = ~ cuisine_description,
type = "box", colors = "viridis") %>%
layout(
xaxis = list(title = "Top 10 Cuisine(in number)"),
yaxis = list(title = "Score")
)
## Warning: `arrange_()` is deprecated as of dplyr 0.7.0.
## Please use `arrange()` instead.
## See vignette('programming') for more help
## This warning is displayed once every 8 hours.
## Call `lifecycle::last_warnings()` to see where this warning was generated.